1// Insert menu illustration scene "Woods.pov"
2// Author: Friedrich A. Lohmueller, March-2013
3#version 3.7;
4global_settings{ assumed_gamma 1.0 }
5//--------------------------------------------------------------------------
6
7#include "shapes.inc"
8#include "colors.inc"
9#include "textures.inc"
10#include "glass.inc"
11//------------------------------------
12
13#declare In_Path1  = "E0 - Textures and Materials/25 - Wood samples/"
14
15  //    #declare Typ = 68 ; // for tests
16
17#switch (Typ)  //----------------------------------------------------------
18// In_Path1
19#case(1)  #declare Txt_Path="01 - Cherry_Wood.txt" #break
20#case(2)  #declare Txt_Path="02 - Pine_Wood.txt" #break
21#case(3)  #declare Txt_Path="03 - Dark_Wood.txt" #break
22#case(4)  #declare Txt_Path="04 - Tan_Wood.txt" #break
23#case(5)  #declare Txt_Path="05 - White_Wood.txt" #break
24#case(6)  #declare Txt_Path="06 - Tom_Wood.txt" #break
25#case(7)  #declare Txt_Path="07 - Yellow_Pine.txt" #break
26#case(8)  #declare Txt_Path="08 - Rosewood.txt" #break
27#case(9)  #declare Txt_Path="09 - Sandalwood.txt" #break
28
29
30#case(10)  #declare Txt_Path="10 - EMBWood1.txt" #break
31#case(11)  #declare Txt_Path="11 - DMFWood1.txt" #break
32#case(12)  #declare Txt_Path="11 - DMFWood2.txt" #break
33#case(13)  #declare Txt_Path="11 - DMFWood3.txt" #break
34#case(14)  #declare Txt_Path="11 - DMFWood4.txt" #break
35#case(15)  #declare Txt_Path="11 - DMFWood5.txt" #break
36#case(16)  #declare Txt_Path="11 - DMFWood6.txt" #break
37#case(17)  #declare Txt_Path="12 - DMFDarkOak.txt" #break
38#case(18)  #declare Txt_Path="12 - DMFLightOak.txt" #break
39#case(19)  #declare Txt_Path="22 - Cork.txt" #break
40
41#case(20)  #declare Txt_Path="22 - Cork bumps.txt" #break
42/*
43#case(25)  #declare Txt_Path=".txt" #break
44*/
45#case(31)  #declare Txt_Path="30 - PineWood1.txt" #break
46#case(32)  #declare Txt_Path="31 - PineWood2.txt" #break
47#case(33)  #declare Txt_Path="32 - PineWood3.txt" #break
48#case(34)  #declare Txt_Path="33 - PineWood4.txt" #break
49
50#case(35)  #declare Txt_Path="35 - T_Wood1.txt" #break
51#case(36)  #declare Txt_Path="35 - T_Wood2.txt" #break
52#case(37)  #declare Txt_Path="35 - T_Wood3.txt" #break
53#case(38)  #declare Txt_Path="35 - T_Wood4.txt" #break
54#case(39)  #declare Txt_Path="35 - T_Wood5.txt" #break
55
56#case(40)  #declare Txt_Path="35 - T_Wood6.txt" #break
57#case(41)  #declare Txt_Path="35 - T_Wood7.txt" #break
58#case(42)  #declare Txt_Path="35 - T_Wood8.txt" #break
59#case(43)  #declare Txt_Path="35 - T_Wood9.txt" #break
60#case(44)  #declare Txt_Path="36 - T_Wood10.txt" #break
61#case(45)  #declare Txt_Path="36 - T_Wood11.txt" #break
62#case(46)  #declare Txt_Path="36 - T_Wood12.txt" #break
63#case(47)  #declare Txt_Path="36 - T_Wood13.txt" #break
64#case(48)  #declare Txt_Path="36 - T_Wood14.txt" #break
65#case(49)  #declare Txt_Path="36 - T_Wood15.txt" #break
66
67#case(50)  #declare Txt_Path="36 - T_Wood16.txt" #break
68#case(51)  #declare Txt_Path="36 - T_Wood17.txt" #break
69#case(52)  #declare Txt_Path="36 - T_Wood18.txt" #break
70#case(53)  #declare Txt_Path="36 - T_Wood19.txt" #break
71#case(54)  #declare Txt_Path="36 - T_Wood20.txt" #break
72#case(55)  #declare Txt_Path="36 - T_Wood21.txt" #break
73#case(56)  #declare Txt_Path="36 - T_Wood22.txt" #break
74#case(57)  #declare Txt_Path="36 - T_Wood23.txt" #break
75#case(58)  #declare Txt_Path="36 - T_Wood24.txt" #break
76#case(59)  #declare Txt_Path="36 - T_Wood25.txt" #break
77
78#case(60)  #declare Txt_Path="36 - T_Wood26.txt" #break
79#case(61)  #declare Txt_Path="36 - T_Wood27.txt" #break
80#case(62)  #declare Txt_Path="36 - T_Wood28.txt" #break
81#case(63)  #declare Txt_Path="36 - T_Wood29.txt" #break
82#case(64)  #declare Txt_Path="36 - T_Wood30.txt" #break
83#case(65)  #declare Txt_Path="36 - T_Wood31.txt" #break
84#case(66)  #declare Txt_Path="36 - T_Wood32.txt" #break
85#case(67)  #declare Txt_Path="36 - T_Wood33.txt" #break
86#case(68)  #declare Txt_Path="36 - T_Wood34.txt" #break
87#case(69)  #declare Txt_Path="36 - T_Wood35.txt" #break
88
89
90#end // of '#switch (Typ)' ------------------------------------------------
91//-------------------------------------------------------------------------
92#macro Base_Shape1( Tex ) // left box, right sphere
93union{
94 box{<-0.3,-1.9/2,0>,<0.3,1.9/2,7> rotate<0, 0,0> texture{Tex} translate<-0.95 ,0.1+1.9/2,-0.8> }
95 sphere{<0,0,0>,1.05 texture{Tex} translate<0.65,1.2,0> }
96 translate<0,0,-0.35>
97 }//
98#end // macro
99//-------------------------------------------------------------------------
100//-------------------------------------------------------------------------
101//-------------------------------------------------------------------------
102#if ( (Typ >=1) & (Typ <=70)) //
103
104#default{ finish{ ambient 0.1 diffuse 0.9 }}
105#include "woods.inc"
106
107camera { angle 75      // front view
108         location  <0.0 , 1.0 ,-3.0>
109         right     x*image_width/image_height
110         look_at   <0.0 , 1.0 , 0.0>}
111light_source{< 1500,2000,-2500> color White}
112// sky
113plane{<0,1,0>,1 hollow
114       texture{ pigment{ bozo turbulence 0.92
115                         color_map { [0.00 rgb <0.20, 0.20, 1.0>*0.9]
116                                     [0.50 rgb <0.20, 0.20, 1.0>*0.9]
117                                     [0.70 rgb <1,1,1>]
118                                     [0.85 rgb <0.25,0.25,0.25>]
119                                     [1.0 rgb <0.5,0.5,0.5>]}
120                        scale<1,1,1.5>*2.5  translate< 0,0,0>
121                       }
122                finish {ambient 1 diffuse 0} }
123       scale 10000}
124// fog on the ground -------------------------
125fog { fog_type   2
126      distance   50
127      color      White
128      fog_offset 0.1
129      fog_alt    1.5
130      turbulence 1.8
131    }
132// ground ------------------------------------
133plane { <0,1,0>, 0
134        texture{ pigment{ color rgb<0.35,0.65,0.0>*0.72 }
135	         normal { bumps 0.75 scale 0.015 }
136                 finish { phong 0.1 }
137               } // end of texture
138      } // end of plane
139//plane{ <0,1,0>, 0.001 texture{ pigment{  color rgb<0.55,0.45,0.43>*0.3} finish { phong 0.1} } }
140#end //--------------------------------------------------------------------
141//-------------------------------------------------------------------------
142
143#if ( ((Typ>=1) & (Typ<=20)) | ((Typ>=31) & (Typ<=69))       ) //
144object{ Base_Shape1( #include concat(In_Path1,Txt_Path) ) translate<0,0,-0.00> }
145#end //----------
146//-------------------------------------------------------------------------
147
148
149
150
151